(grep-compute-defaults): If xargs -e isn't supported, use find -exec.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index a426ea647570d0f0aa2549235e8aee14430c13d4..5f2d3c7b0597ea0404dce6b459c53686734af1d9 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -560,9 +560,13 @@ to a function that generates a unique name."
          (format "%s -n " grep-program)))
   (unless grep-find-use-xargs
     (setq grep-find-use-xargs
-         (if (equal (call-process "find" nil nil nil
-                                  null-device "-print0")
-                    0)
+         (if (and
+               (equal (call-process "find" nil nil nil
+                                    null-device "-print0")
+                      0)
+               (equal (call-process "xargs" nil nil nil
+                                    "-0" "-e" "echo")
+                    0))
              'gnu)))
   (setq grep-find-command
        (cond ((eq grep-find-use-xargs 'gnu)